home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / DruckerTreiber / HP400c / Install_Driver < prev   
Encoding:
Text File  |  2002-10-28  |  1.9 KB  |  60 lines
  1. ; Driver install script
  2. ; PJ Hutchison 1.1 1/8/02
  3.  
  4. (User 1) ; Average user
  5.  
  6. (Set #cpu  
  7.   (AskChoice (PROMPT "Select Processor version") 
  8.              (HELP "Select which processor version to use")
  9.              (CHOICES "68000" "68020" "68040")
  10.              (DEFAULT 0)
  11.              )
  12. )
  13.  
  14. ; Copy CPU version of driver to t:Driver
  15.  
  16. (Select #cpu
  17.   (Copyfiles (Source "HP_Deskjet_400C.000") (Dest "t:") (NewName "Driver") (NoGauge))
  18.   (Copyfiles (Source "HP_Deskjet_400C.020") (Dest "t:") (NewName "Driver") (NoGauge))
  19.   (Copyfiles (Source "HP_Deskjet_400C.040") (Dest "t:") (NewName "Driver") (NoGauge))
  20. )
  21.  
  22. ; Select a model from list
  23. (Set #Model  
  24.   (AskChoice (Prompt "Which HP Deskjet Model?")
  25.              (Help "Select a Printer")
  26.              (Choices "Deskjet 400C" "Deskjet 400L" "Deskjet 440C" "Deskjet 460C"
  27.                "Deskjet 480C" "Deskjet 200C")
  28.              (Default 0)
  29.   )
  30. )
  31.  
  32. ; Copy selected model to devs:printers
  33.  
  34. (Select #Model 
  35.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_400C"))
  36.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_400L"))
  37.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_440C"))
  38.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_460C"))
  39.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_480C"))
  40.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_200C"))
  41. )
  42.  
  43. ; Launch Printer Preferences
  44.  
  45. (if ( = (AskChoice (Prompt "Do you wish to change Printer Prefs?")
  46.                (Help "Printer Prefs")
  47.                (Choices "Yes" "No")) 0)
  48.     (Run "Sys:Prefs/Printer")
  49. )
  50.  
  51. (if ( = (AskChoice (Prompt "Do you wish to change PrinterGfx Prefs?")
  52.                (Help "PrinterGfx Prefs")
  53.                (Choices "Yes" "No")) 0)
  54.     (Run "Sys:Prefs/PrinterGfx")
  55. )
  56.  
  57. (EXIT "Your Printer Driver is now installed in Devs:Printers")
  58.  
  59. ; End of script
  60.